IF exists(SELECT * FROM dbo.sysobjects WHERE name='archief_llnPerKlas' AND xtype='P') 
BEGIN
	DROP PROCEDURE archief_llnPerKlas
END
GO

create procedure archief_llnPerKlas
as
set nocount on
select '0AAAA' as klas,0 as klasNr,'<?xml version="1.0"  encoding="ISO-8859-1" ?><leerlingen>' as tekst
union
select klas,0,'<klas klasNaam = "' + klas + '">'
from vertaalTabelKlas
union
select klas,klasnr,'<leerling iNr="' + l.inschrijvingsNr 
 	+ '" recent="' + dbo.WEB_recentGewijzigd(w.gewijzigdOp,getDate())
	+ '"><voornaam>'  
	+ isNull(voornaam,'') + '</voornaam><naam>' + isNull(achternaam,'') 
	+ '</naam></leerling>'
from leerlingen as l
	left join wijzigingen as w
	on l.inschrijvingsNr = w.inschrijvingsNr
union
select klas,999,'</klas>'
from vertaalTabelKlas
union
select 'ZZZZZ',0,'</leerlingen>'
order by klas, klasNr